F1 Licenseware/F1 Licenseware - Volume 1.iso/disks/045.dms/045.adf/str/STR12

Text File | 1989-08-17 | 291b | 1 lines

 L R8= 3;J S; W:I RZ& 4J S;P;J W;S:L R8=R8+1;P;I R8=1 J A;I R8=2 J B;I R8=3 J C;L R8=0 J D;A: P; A 1,(16,1)(15,1)(14,1)(13,1);P;P;P;L RZ=0;J W;B: P; A 1,(12,1)(11,1)(10,1)(9,1);P;P;P;L RZ=0;J W;C: P; A 1,(8,1)(7,1)(6,1)(5,1);P;P;P;L RZ=0;J W;D: P; A 1,(4,1)(3,1)(2,1)(1,1);P;P;P;L RZ=0;J W;?